Visual Basic Source Code

home *** CD-ROM | disk | FTP | other *** search

/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / callin1g / frmtextu.frm (.txt) < prev next >

Wrap

Visual Basic Form | 1999-08-16 | 31.6 KB | 1,007 lines

VERSION 5.00 Begin VB.Form frmTextures Caption = "Form1" ClientHeight = 5925 ClientLeft = 60 ClientTop = 345 ClientWidth = 8100 LinkTopic = "Form1" ScaleHeight = 5925 ScaleWidth = 8100 StartUpPosition = 3 'Windows Default Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 77 Left = 6600 Picture = "frmTextures.frx":0000 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 75 Top = 3720 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 59 Left = 6600 Picture = "frmTextures.frx":1302 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 74 Top = 120 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 56 Left = 6600 Picture = "frmTextures.frx":2604 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 73 Top = 1560 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 62 Left = 6600 Picture = "frmTextures.frx":3906 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 72 Top = 2280 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 69 Left = 6600 Picture = "frmTextures.frx":4C08 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 71 Top = 3000 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 72 Left = 6600 Picture = "frmTextures.frx":5F0A ScaleHeight = 600 ScaleWidth = 600 TabIndex = 70 Top = 840 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 55 Left = 3000 Picture = "frmTextures.frx":720C ScaleHeight = 600 ScaleWidth = 600 TabIndex = 69 Top = 5160 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 54 Left = 5160 Picture = "frmTextures.frx":850E ScaleHeight = 600 ScaleWidth = 600 TabIndex = 68 Top = 1560 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 71 Left = 5160 Picture = "frmTextures.frx":9810 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 67 Top = 4440 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 70 Left = 2280 Picture = "frmTextures.frx":AB12 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 66 Top = 5160 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 68 Left = 2280 Picture = "frmTextures.frx":BE14 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 65 Top = 3720 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 67 Left = 2280 Picture = "frmTextures.frx":D116 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 64 Top = 4440 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 66 Left = 2280 Picture = "frmTextures.frx":E418 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 63 Top = 3000 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 65 Left = 3000 Picture = "frmTextures.frx":F71A ScaleHeight = 600 ScaleWidth = 600 TabIndex = 62 Top = 4440 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 64 Left = 3000 Picture = "frmTextures.frx":10A1C ScaleHeight = 600 ScaleWidth = 600 TabIndex = 61 Top = 3720 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 63 Left = 3720 Picture = "frmTextures.frx":11D1E ScaleHeight = 600 ScaleWidth = 600 TabIndex = 60 Top = 3720 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 61 Left = 3000 Picture = "frmTextures.frx":13020 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 59 Top = 3000 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 60 Left = 3720 Picture = "frmTextures.frx":14322 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 58 Top = 3000 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 58 Left = 5880 Picture = "frmTextures.frx":15624 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 57 Top = 3720 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 57 Left = 5880 Picture = "frmTextures.frx":16926 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 56 Top = 4440 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 53 Left = 5880 Picture = "frmTextures.frx":17C28 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 55 Top = 3000 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 52 Left = 4440 Picture = "frmTextures.frx":18F2A ScaleHeight = 600 ScaleWidth = 600 TabIndex = 54 Top = 3720 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 51 Left = 5160 Picture = "frmTextures.frx":1A22C ScaleHeight = 600 ScaleWidth = 600 TabIndex = 53 Top = 3720 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 50 Left = 3720 Picture = "frmTextures.frx":1B52E ScaleHeight = 600 ScaleWidth = 600 TabIndex = 52 Top = 4440 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 49 Left = 4440 Picture = "frmTextures.frx":1C830 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 51 Top = 3000 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 48 Left = 5160 Picture = "frmTextures.frx":1DB32 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 50 Top = 3000 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 47 Left = 120 Picture = "frmTextures.frx":1EE34 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 49 Top = 5160 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 46 Left = 840 Picture = "frmTextures.frx":20136 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 48 Top = 5160 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 45 Left = 1560 Picture = "frmTextures.frx":21438 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 47 Top = 5160 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 44 Left = 120 Picture = "frmTextures.frx":2273A ScaleHeight = 600 ScaleWidth = 600 TabIndex = 46 Top = 3720 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 43 Left = 120 Picture = "frmTextures.frx":23A3C ScaleHeight = 600 ScaleWidth = 600 TabIndex = 45 Top = 4440 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 42 Left = 120 Picture = "frmTextures.frx":24D3E ScaleHeight = 600 ScaleWidth = 600 TabIndex = 44 Top = 3000 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 41 Left = 840 Picture = "frmTextures.frx":26040 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 43 Top = 4440 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 40 Left = 840 Picture = "frmTextures.frx":27342 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 42 Top = 3720 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 39 Left = 1560 Picture = "frmTextures.frx":28644 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 41 Top = 3720 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 38 Left = 1560 Picture = "frmTextures.frx":29946 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 40 Top = 4440 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 37 Left = 840 Picture = "frmTextures.frx":2AC48 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 39 Top = 3000 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 36 Left = 1560 Picture = "frmTextures.frx":2BF4A ScaleHeight = 600 ScaleWidth = 600 TabIndex = 38 Top = 3000 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 35 Left = 1560 Picture = "frmTextures.frx":2D24C ScaleHeight = 600 ScaleWidth = 600 TabIndex = 37 Top = 120 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 34 Left = 840 Picture = "frmTextures.frx":2E54E ScaleHeight = 600 ScaleWidth = 600 TabIndex = 36 Top = 120 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 33 Left = 1560 Picture = "frmTextures.frx":2F850 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 35 Top = 1560 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 32 Left = 1560 Picture = "frmTextures.frx":30B52 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 34 Top = 840 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 31 Left = 840 Picture = "frmTextures.frx":31E54 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 33 Top = 840 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 30 Left = 840 Picture = "frmTextures.frx":33156 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 32 Top = 1560 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 29 Left = 120 Picture = "frmTextures.frx":34458 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 31 Top = 120 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 28 Left = 120 Picture = "frmTextures.frx":3575A ScaleHeight = 600 ScaleWidth = 600 TabIndex = 30 Top = 1560 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 27 Left = 120 Picture = "frmTextures.frx":36A5C ScaleHeight = 600 ScaleWidth = 600 TabIndex = 29 Top = 840 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 26 Left = 1560 Picture = "frmTextures.frx":37D5E ScaleHeight = 600 ScaleWidth = 600 TabIndex = 28 Top = 2280 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 25 Left = 840 Picture = "frmTextures.frx":39060 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 27 Top = 2280 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 24 Left = 120 Picture = "frmTextures.frx":3A362 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 26 Top = 2280 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 23 Left = 5880 Picture = "frmTextures.frx":3B664 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 25 Top = 120 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 22 Left = 5160 Picture = "frmTextures.frx":3C966 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 24 Top = 120 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 21 Left = 5880 Picture = "frmTextures.frx":3DC68 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 23 Top = 1560 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 20 Left = 5880 Picture = "frmTextures.frx":3EF6A ScaleHeight = 600 ScaleWidth = 600 TabIndex = 22 Top = 840 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 19 Left = 5160 Picture = "frmTextures.frx":4026C ScaleHeight = 600 ScaleWidth = 600 TabIndex = 21 Top = 840 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 18 Left = 4440 Picture = "frmTextures.frx":4156E ScaleHeight = 600 ScaleWidth = 600 TabIndex = 20 Top = 4440 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 17 Left = 4440 Picture = "frmTextures.frx":42870 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 19 Top = 120 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 16 Left = 4440 Picture = "frmTextures.frx":43B72 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 18 Top = 1560 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 15 Left = 4440 Picture = "frmTextures.frx":44E74 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 17 Top = 840 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 14 Left = 5880 Picture = "frmTextures.frx":46176 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 16 Top = 2280 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 13 Left = 5160 Picture = "frmTextures.frx":47478 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 15 Top = 2280 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 12 Left = 4440 Picture = "frmTextures.frx":4877A ScaleHeight = 600 ScaleWidth = 600 TabIndex = 14 Top = 2280 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 11 Left = 3720 Picture = "frmTextures.frx":49A7C ScaleHeight = 600 ScaleWidth = 600 TabIndex = 13 Top = 120 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 10 Left = 3000 Picture = "frmTextures.frx":4AD7E ScaleHeight = 600 ScaleWidth = 600 TabIndex = 12 Top = 120 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 9 Left = 3720 Picture = "frmTextures.frx":4C080 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 11 Top = 1560 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 8 Left = 3720 Picture = "frmTextures.frx":4D382 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 10 Top = 840 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 7 Left = 3000 Picture = "frmTextures.frx":4E684 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 9 Top = 840 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 6 Left = 3000 Picture = "frmTextures.frx":4F986 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 8 Top = 1560 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 5 Left = 2280 Picture = "frmTextures.frx":50C88 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 7 Top = 120 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 4 Left = 2280 Picture = "frmTextures.frx":51F8A ScaleHeight = 600 ScaleWidth = 600 TabIndex = 6 Top = 1560 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 3 Left = 2280 Picture = "frmTextures.frx":5328C ScaleHeight = 600 ScaleWidth = 600 TabIndex = 5 Top = 840 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 2 Left = 3720 Picture = "frmTextures.frx":5458E ScaleHeight = 600 ScaleWidth = 600 TabIndex = 4 Top = 2280 Width = 660 End Begin VB.PictureBox picInvisible AutoSize = -1 'True Height = 540 Left = 5880 Picture = "frmTextures.frx":55890 ScaleHeight = 480 ScaleWidth = 480 TabIndex = 3 Top = 5280 Width = 540 End Begin VB.PictureBox picVisible AutoRedraw = -1 'True AutoSize = -1 'True Height = 540 Left = 5160 Picture = "frmTextures.frx":559E2 ScaleHeight = 480 ScaleWidth = 480 TabIndex = 2 Top = 5280 Width = 540 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 1 Left = 2280 Picture = "frmTextures.frx":55B34 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 1 Top = 2280 Width = 660 End Begin VB.PictureBox picTextures AutoRedraw = -1 'True AutoSize = -1 'True Height = 660 Index = 0 Left = 3000 Picture = "frmTextures.frx":56E36 ScaleHeight = 600 ScaleWidth = 600 TabIndex = 0 Top = 2280 Width = 660 End Attribute VB_Name = "frmTextures" Attribute VB_GlobalNameSpace = False Attribute VB_Creatable = False Attribute VB_PredeclaredId = True Attribute VB_Exposed = False 'This windows holds the different pictures to make up the maps 'The textures are held by an array of picture boxes, so that each map 'file just needs to hold the texture number, and that's it. Private Sub Form_Load() End Sub